home *** CD-ROM | disk | FTP | other *** search
/ Windows News 2005 November / WNnov2005.iso / Windows / Equipement / hMailServer / hMailServer-4.1-Build-136.exe / {app} / PHPWebAdmin / accounts_delete.php < prev    next >
PHP Script  |  2005-01-06  |  2KB  |  62 lines
  1. <?php
  2. /*
  3. ** $Id: accounts_delete.php,v 1.3 2005/01/05 22:22:50 hmailserver Exp $
  4. **
  5. **    hMailServer - Web interface
  6. **
  7. **    File formatted using TAB size 4
  8. **
  9. **    Get hMailserver at http://www.hmailserver.com
  10. **
  11. **    Author: Steen Rab°l <srabol@mail.tele.dk>
  12. **    Copyright (c) 2004, Steen Rab°l <srabol@mail.tele.dk>
  13. **
  14. **  This program is free software; you can redistribute it and/or modify
  15. **  it under the terms of the GNU General Public License as published by
  16. **  the Free Software Foundation; either version 2 of the License, or
  17. **  (at your option) any later version.
  18. **
  19. **  You may not change or alter any portion of this comment or credits
  20. **  of supporting developers from this source code or any supporting
  21. **  source code which is considered copyrighted (c) material of the
  22. **  original comment or credit authors.
  23. **
  24. **  This program is distributed in the hope that it will be useful,
  25. **  but WITHOUT ANY WARRANTY; without even the implied warranty of
  26. **  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  27. **  GNU General Public License for more details.
  28. **
  29. **  You should have received a copy of the GNU General Public License
  30. **  along with this program; if not, write to the Free Software
  31. **  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  32. **
  33. */
  34.  
  35.  
  36. $DomainID    = hmailGetVar("DomainID",0);
  37. $AccountID    = hmailGetVar("AccountID",0);
  38.  
  39. if (hmailGetAdminLevel() == 1 && $DomainID != hmailGetDomainID())
  40.     hmailHackingAttemp(); // Domain admin but not for this domain.
  41.  
  42. $function    = hmailGetVar("function","");
  43. $obDomain    = $obBaseApp->Domains->ItemByDBID($DomainID);
  44.  
  45. switch($function)
  46. {
  47.     case "dodelete":
  48.         $obAccounts = $obDomain->Accounts();
  49.         $obAccounts->DeleteByDBID($AccountID);
  50.         header("refresh: 0; url=index.php?page=accounts&DomainID=$DomainID");
  51.         exit();
  52.         break;
  53.  
  54.     default:
  55.         $obAccounts = $obDomain->Accounts();
  56.         $obAccount    = $obAccounts->ItemByDBID($AccountID);
  57.         $hmailSmarty->assign("account",$obAccount);
  58.         $hmailSmarty->assign("domain",$obDomain);
  59.         $hmailSmarty->assign("pagecontent", $hmailSmarty->fetch('accounts_delete.tpl'));
  60.         break;
  61. }
  62. ?>